home *** CD-ROM | disk | FTP | other *** search
- {$ifndef GRAPHICS_COPPER_H}
- Const GRAPHICS_COPPER_H = 77;
- COPPER_MOVE = 0;
- COPPER_WAIT = 1;
- CPRNXTBUF = 2;
- CPR_NT_LOF = $8000;
- CPR_NT_SHT = $4000;
- Type p_CopIns = ^CopIns;
- p_CopList = ^CopList;
- p_cprlist = ^cprlist;
- p_UCopList = ^UCopList;
- CopIns = record
- OpCode: integer;
- u3: record
- Case integer of
- 0: (nxtlist: p_CopList);
- 1: (u4: record
- u1: record
- Case integer of
- 0: (VWaitPos: integer);
- 1: (DestAddr: integer);
- end{u1};
- u2: record
- Case integer of
- 0: (HWaitPos: integer);
- 1: (DestData: integer)
- end {u2}
- end {u4} )
- end {u3};
- end;
- cprlist = record
- Next: p_cprlist;
- start: ^Word;
- MaxCount: integer
- end;
- CopList = record
- Next: p_CopList;
- _CopList: p_CopList;
- _ViewPort: Ptr {p_ViewPort;}
- CopIns: p_CopIns;
- CopPtr: p_CopIns;
- CopLStart,CopSStart: ^Word;
- Count,MaxCount,DyOffset: integer
- end;
- UCopList = record
- Next: p_UCopList;
- FirstCopList: p_CopList;
- CopList: p_CopList
- end;
- p_copinit = ^copinit;
- copinit = record
- diagstrt: Array[0..3] of Word;
- sprstrtup: Array[0..39 {(2*8*2)+2+(2*2)+2}] of Word;
- sprstop: Array[0..1] of Word
- end;
- {$endif}
-